home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
AmigActive 2
/
AACD 2.iso
/
AACD
/
Hardware
/
Spitfire!
/
SpitfireInstall
< prev
Wrap
Text File
|
1999-09-14
|
8KB
|
299 lines
;
; Spitfire Installer Script
; Copyright ©1999 Ralph Torchia
; All Rights Reserved
;
; Email: torchia@windsor.igs.net
; WWW : http://www.windsor.igs.net/~torchia/
;
; $VER: Spitfire-Install v1.2 (03.05.1999)
;
;---------------------------------------------------------------------
;__________Set up variables__________
;copyright
(set #copyright "Copyright ©1999 Ralph Torchia")
;minimal os for installation
(set #min_os_version 39)
(set #min_os_revision 0)
;spitfire version
(set #spit_ver (getversion "Spitfire"))
(set #spit_version (/ #spit_ver 65536))
(set #spit_revision (- #spit_ver (* #spit_version 65536) ) )
;default destination directories
(set #dest-spitfire "Work:")
(set #dest-libs "LIBS:")
(set #dest-mui "MUI:Libs/mui/")
;default language
(set @language "english")
;---------------------------------------------------------------------
;__________English__________
(set #welcome-msg ("Welcome to Spitfire!\n\nInstallation for Spitfire version %ld.%ld\n\nCopyright ©1999 Ralph Torchia\nAll Rights Reserved" #spit_version #spit_revision))
(set #dest-prompt "Where shall the Spitfire program be placed? (a directory will be created)")
(set #dest-help "Use the requester to select an area on your system where you want the Spifire folder located")
(set #libs-prompt "Copying to LIBS: the file ")
(set #libs-help "")
(set #mui-prompt "Copying to MUI:Libs/mui/ the file ")
(set #mui-help "")
(set #dir-prompt "Creating directory for Spitfire...")
(set #dir-help "")
(set #spit-prompt "Copying Spitfire...")
(set #spit-help "")
(set #imgs-asktype "Which Images do you want to install with Spitfire?")
(set #imgs-prompt "Copying Spitfire images...")
(set #imgs-help "")
(set #guide-prompt "Copying Spitfire Guide...")
(set #guide-help "")
(set #icon-msg1 "Copying Spitfire icon...")
(set #icon-msg2 "Copying Spitfire Guide icon...")
(set #icon-help "")
(set #key-prompt "Copying Spitfire key...")
(set #key-help "")
(set #key-msg "Thank-you for registering Spitfire! Your support is greatly appreciated.")
(set #exit-msg "Spitfire installation is finished!\n\nRemember, this product is shareware!")
;---------------------------------------------------------------------
;__________Introduce Outselves__________
(welcome #welcome-msg)
(set #dest-spitfire
(askdir
(prompt #dest-prompt)
(help #dest-help)
(default #dest-spitfire)
)
)
(set #dest-spitfiredir (tackon #dest-spitfire "Spitfire"))
(set @default-dest #dest-spitfire)
(set #dest-spitfireimg (tackon #dest-spitfiredir "images"))
;__________Copy libs__________
(
(copylib
(prompt #libs-prompt "palmlink.library")
(help #libs-help)
(confirm "average")
(source "libs/palmlink.library")
(dest #dest-libs)
(optional "oknodelete" "force")
)
(copylib
(prompt #libs-prompt "date.library")
(help #libs-help)
(confirm "average")
(source "libs/date.library")
(dest #dest-libs)
(optional "oknodelete" "force")
)
(copylib
(prompt #libs-prompt "vapor_toolkit.library")
(help #libs-help)
(confirm "average")
(source "libs/vapor_toolkit.library")
(dest #dest-libs)
(optional "oknodelete" "force")
)
(copylib
(prompt #libs-prompt "vapor_update.library")
(help #libs-help)
(confirm "average")
(source "libs/vapor_update.library")
(dest #dest-libs)
(optional "oknodelete" "force")
)
)
;__________Copy MUI stuff__________
(
(copylib
(prompt #mui-prompt "InfoText.mcc")
(help #mui-help)
(confirm "average")
(source "mui/InfoText.mcc")
(dest #dest-mui)
(optional "oknodelete" "force")
)
(copylib
(prompt #mui-prompt "MonthNavigator.mcc")
(help #mui-help)
(confirm "average")
(source "mui/MonthNavigator.mcc")
(dest #dest-mui)
(optional "oknodelete" "force")
)
(copylib
(prompt #mui-prompt "MonthNavigator.mcp")
(help #mui-help)
(confirm "average")
(source "mui/MonthNavigator.mcp")
(dest #dest-mui)
(optional "oknodelete" "force")
)
(copylib
(prompt #mui-prompt "NFloattext.mcc")
(help #mui-help)
(confirm "average")
(source "mui/NFloattext.mcc")
(dest #dest-mui)
(optional "oknodelete" "force")
)
(copylib
(prompt #mui-prompt "NList.mcc")
(help #mui-help)
(confirm "average")
(source "mui/NList.mcc")
(dest #dest-mui)
(optional "oknodelete" "force")
)
(copylib
(prompt #mui-prompt "NListview.mcc")
(help #mui-help)
(confirm "average")
(source "mui/NListview.mcc")
(dest #dest-mui)
(optional "oknodelete" "force")
)
(copylib
(prompt #mui-prompt "NListviews.mcp")
(help #mui-help)
(confirm "average")
(source "mui/NListviews.mcp")
(dest #dest-mui)
(optional "oknodelete" "force")
)
(copylib
(prompt #mui-prompt "Textinput.mcc")
(help #mui-help)
(confirm "average")
(source "mui/Textinput.mcc")
(dest #dest-mui)
(optional "oknodelete" "force")
)
(copylib
(prompt #mui-prompt "Textinput.mcp")
(help #mui-help)
(confirm "average")
(source "mui/Textinput.mcp")
(dest #dest-mui)
(optional "oknodelete" "force")
)
(copylib
(prompt #mui-prompt "Textinputscroll.mcc")
(help #mui-help)
(confirm "average")
(source "mui/Textinputscroll.mcc")
(dest #dest-mui)
(optional "oknodelete" "force")
)
)
;__________Copy Spitfire__________
(if (not (exists #dest-spitfiredir))
(
(makedir #dest-spitfiredir
(prompt #dir-prompt)
(help #dir-help)
(infos)
)
(copyfiles
(prompt #icon-msg1)
(help #icon-help)
(source "Spitfire.info")
(dest #dest-spitfiredir)
)
(copyfiles
(prompt #icon-msg2)
(help #icon-help)
(source "Spitfire.guide.info")
(dest #dest-spitfiredir)
)
)
)
(
(copyfiles
(prompt #spit-prompt)
(help #spit-help)
(source "Spitfire")
(dest #dest-spitfiredir)
)
(copyfiles
(prompt #guide-prompt)
(help #guide-help)
(source "Spitfire.guide")
(dest #dest-spitfiredir)
)
)
;__________Copy Image folder__________
(set #imgs-choice
(askchoice
(prompt #imgs-asktype)
(help @askchoice-help)
(choices "MagicWB"
"NewIcons - Bordered"
"NewIcons - No Border")
(default 0)
)
)
(if (= #imgs-choice 0)
(set #imgs-source "images/magicwb/")
(set #imgs-logo "images/SpitfireLogo")
)
(if (= #imgs-choice 1)
(set #imgs-source "images/newicons-border/")
(set #imgs-logo "images/SpitfireLogo2-256")
)
(if (= #imgs-choice 2)
(set #imgs-source "images/newicons-noborder/")
(set #imgs-logo "images/SpitfireLogo2-256")
)
(copyfiles
(prompt #imgs-prompt)
(help #imgs-help)
(source #imgs-source)
(all)
(dest #dest-spitfireimg)
)
(copyfiles
(prompt #imgs-prompt)
(help #imgs-help)
(source #imgs-logo)
(dest #dest-spitfireimg)
(newname "SpitfireLogo")
)
;__________Copy key if found__________
(if (exists "spitfire.key")
(
(copyfiles
(prompt #key-prompt)
(help #key-help)
(source "spitfire.key")
(dest #dest-spitfiredir)
)
(message #key-msg)
)
)
(exit #exit-msg)